home *** CD-ROM | disk | FTP | other *** search
/ SVM Multimedia Villagina 5 / SVM Multimedia - Villagina 5.iso / mac / SVMM_5 / DEBUT.DIR / 00058_Script_58 < prev    next >
Text File  |  1996-01-15  |  742b  |  27 lines
  1.  
  2. on test
  3.     Set bouton1 = ( the name of cast the castnum of sprite (the clickon))
  4.   put bouton1
  5.   
  6.   if the last char of  bouton1 = "B" then 
  7.     --set bouton1= bouton1 - (the last char of  bouton1 )
  8.     --    delete the last char of  bouton1 -- ne fonctionne plus bizarre ??????
  9.     delete  char 7 of bouton1
  10.   end if
  11.   
  12.   --put bouton1
  13.   set the castnum of sprite (the clickon) to the number of cast (the name of cast bouton1)
  14.   updatestage
  15.   
  16.   repeat while rollover (31) 
  17.     if the mouseDown  then exit
  18.     
  19.     updatestage
  20.   end repeat
  21.   set the castnum of sprite (The clickon) to the number of cast¨
  22.  (the name of cast the castnum of sprite The clickon &"B")
  23.   movesoussommaire
  24.   testPAUSE
  25.   updatestage
  26. end
  27.